(EQ): Use == so args are computed just once.

diff --git a/src/lisp.h b/src/lisp.h
index ad5088da65f35e3b95901542d69ca02e9923c0a2..b8213c516cb0968ff8b8d156119a997f1b16a6a8 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -454,7 +454,7 @@ enum pvec_type
 extern Lisp_Object make_number P_ ((EMACS_INT));
 #endif
 
-#define EQ(x, y) ((x).s.val == (y).s.val && (x).s.type == (y).s.type)
+#define EQ(x, y) ((x).i == (y).i)
 
 #endif /* NO_UNION_TYPE */